(global-set-key [f12]
		'(lambda ()
		   (interactive)
		   (let ((default-directory "~/blog/"))
		     (ido-find-file))))
